program nk;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  n, k, i, d, a, b, j, x, cnk:integer;


begin
  writeln('Enter N:');
  readln(n);
  writeln('Enter K:');
  readln(k);
  a:=1;
  b:=1;
  d:=1;

  for i:=1 to n do
    a:=a*i;

  for j:=1 to k do
    b:=b*j;

  if (n=k) then
    writeln('1')
    else
    begin
      for x:=1 to n-k do
      begin
        d:=d*x;
      end;
    cnk:=((a) div (b*d));
    writeln(cnk);
  end;
  readln;
end.
